home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Storm 2
/
Storm II.iso
/
setup
/
stormii.vp
/
STORM.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-08-30
|
2KB
|
145 lines
@echo Off
CLS
type Storm.111
pause
Type Storm.222
ASK /E "" ABCDEFGHIJKLMNOPQRSTUVWXYZ
IF ERRORLEVEL 26 GOTO DRIVEZ
IF ERRORLEVEL 25 GOTO DRIVEY
IF ERRORLEVEL 24 GOTO DRIVEX
IF ERRORLEVEL 23 GOTO DRIVEW
IF ERRORLEVEL 22 GOTO DRIVEV
IF ERRORLEVEL 21 GOTO DRIVEU
IF ERRORLEVEL 20 GOTO DRIVET
IF ERRORLEVEL 19 GOTO DRIVES
IF ERRORLEVEL 18 GOTO DRIVER
IF ERRORLEVEL 17 GOTO DRIVFQ
IF ERRORLEVEL 16 GOTO DRIVEP
IF ERRORLEVEL 15 GOTO DRIVEO
IF ERRORLEVEL 14 GOTO DRIVEN
IF ERRORLEVEL 13 GOTO DRIVEM
IF ERRORLEVEL 12 GOTO DRIVEL
IF ERRORLEVEL 11 GOTO DRIVEK
IF ERRORLEVEL 10 GOTO DRIVEJ
IF ERRORLEVEL 9 GOTO DRIVEI
IF ERRORLEVEL 8 GOTO DRIVEH
IF ERRORLEVEL 7 GOTO DRIVEG
IF ERRORLEVEL 6 GOTO DRIVEF
IF ERRORLEVEL 5 GOTO DRIVEE
IF ERRORLEVEL 4 GOTO DRIVED
IF ERRORLEVEL 3 GOTO DRIVEC
IF ERRORLEVEL 2 GOTO DRIVEB
IF ERRORLEVEL 1 GOTO DRIVEA
:DRIVEZ
SET STORMCD=Z:\
GOTO QUIT
:DRIVEY
SET STORMCD=Y:\
GOTO QUIT
:DRIVEX
SET STORMCD=X:\
GOTO QUIT
:DRIVEW
SET STORMCD=W:\
GOTO QUIT
:DRIVEV
SET STORMCD=V:\
GOTO QUIT
:DRIVEU
SET STORMCD=U:\
GOTO QUIT
:DRIVET
SET STORMCD=T:\
GOTO QUIT
:DRIVES
SET STORMCD=S:\
GOTO QUIT
:DRIVER
SET STORMCD=R:\
GOTO QUIT
:DRIVEQ
SET STORMCD=Q:\
GOTO QUIT
:DRIVEP
SET STORMCD=P:\
GOTO QUIT
:DRIVEO
SET STORMCD=O:\
GOTO QUIT
:DRIVEN
SET STORMCD=N:\
GOTO QUIT
:DRIVEM
SET STORMCD=M:\
GOTO QUIT
:DRIVEL
SET STORMCD=L:\
GOTO QUIT
:DRIVEK
SET STORMCD=K:\
GOTO QUIT
:DRIVEJ
SET STORMCD=J:\
GOTO QUIT
:DRIVEI
SET STORMCD=I:\
GOTO QUIT
:DRIVEH
SET STORMCD=H:\
GOTO QUIT
:DRIVEG
SET STORMCD=G:\
GOTO QUIT
:DRIVEF
SET STORMCD=F:\
GOTO QUIT
:DRIVEE
SET STORMCD=E:\
GOTO QUIT
:DRIVED
SET STORMCD=D:\
GOTO QUIT
:DRIVEC
SET STORMCD=C:\
GOTO QUIT
:DRIVEB
SET STORMCD=B:\
GOTO QUIT
:DRIVEA
SET STORMCD=A:\
GOTO QUIT
:QUIT
CLS
PATH=C:\STORM2;%PATH%
MENU